home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / tools / czesc_1 / bangermenu / bangermenu.install < prev    next >
Text File  |  1984-08-23  |  13KB  |  469 lines
  1. ;Autor: Andre´ Trettin
  2. ;© by BangerSoft
  3. ;$VER: BangerMenu.install 3.3 (4-Sep-96)
  4.  
  5. (if (= @LANGUAGE "deutsch")
  6.  (
  7.   (set #bad-kick
  8.   (cat "BangerMenu funktioniert erst ab Kickstart 2.0 oder höher!.\ns. auch BangerMenu.guide\nInstallation abgebrochen"
  9.   ))
  10.   (set #choose-medium
  11.   (cat "Wähle das Medium, wo BangerMenu installiert werden soll."
  12.   ))
  13.   (set #choose-m-help
  14.   (cat "Es kann auf der Festplatte oder aber auf Disketten installiert werden."
  15.   ))
  16.   (set #choose-exe
  17.   (cat "Welches Programm soll installiert werden ?"
  18.   ))
  19.   (set #choose-exe-help
  20.   (cat "BangerMenu ist komplexer und dadurch automatischer größer.\n Wobei BangerMenuDisk extra klein gehalten wurde und ohne jeglichen Schnick Schnak ist.\n"
  21.   ))
  22.   (set #choose-color
  23.   (cat "Wähle die Anzahl der Farben für die Icons."
  24.   ))
  25.   (set #choose-c-help
  26.   (cat "Wenn Sie eine Workbench mit 8 Farben laufen haben, können Sie die 8 Farben Icons installieren."
  27.   ))
  28.   (set #choose-progdir
  29.   (cat "Bitte wählen Sie ein Verzeichnis für BangerMenu aus. Das Verzeichnis BangerMenu wird dort erstellt.!"
  30.   ))
  31.   (set #choose-prog-help
  32.   (cat "In das angewählte Verzeichnis wird ein Verzeichnis mit dem Namen BangerMenu erstellt und die folgenen Programme BangerMenu, BangerMenu.asm, BangerMenu.guide, BangerMenu.install und BangerMenu.prefs werden dort installiert."
  33.   ))
  34.   (set #create-dir
  35.   (cat "Erstelle Unterverziechnis BangerMenu."
  36.   ))
  37.   (set #inst-main
  38.   (cat "Kopiere Hauptprogramme."
  39.   ))
  40.   (set #choose-disk
  41.   (cat "Bitte wählen Sie ein Laufwerk für BangerMenu aus."
  42.   ))
  43.   (set #choose-disk-help
  44.   (cat "BangerMenu wird ins C-Verzeichnis kopiert (legt es an, sofern es nicht vorhanden ist). BangerMenu.Prefs wird ins S-Verzeichnis kopiert (es wird ebenfalls angelegt, falls kein S-Verzeichnis vorhanden ist. Anleitung, Quellcode  und Installationskript können auf Wunsch ebenfalls auf die Diskette kopiert werden."
  45.   ))
  46.   (set #ask-source
  47.   (cat "Soll der Assembler-Sourcecode kopiert werden ?"
  48.   ))
  49.   (set #ask-source-help
  50.   (cat "Programmierer können, wenn sie wollen das Programm nach ihren eigenen Vorstellungen anpassen."
  51.   ))
  52.   (set #inst-source
  53.   (cat "kopiere BangerMenu.asm ..."
  54.   ))
  55.   (set #inst-source2
  56.   (cat "kopiere BangerMonitorID.asm ..."
  57.   ))
  58.   (set #ask-guide
  59.   (cat "Soll die Anleitung kopiert werden ?"
  60.   ))
  61.   (set #ask-guide-help
  62.   (cat "Die Anleitung für das Programm"
  63.   ))
  64.   (set #inst-guide
  65.   (cat "Kopiere BangerMenu.guide ..."
  66.   ))
  67.   (set #ask-install
  68.   (cat "Soll das Installationskript kopiert werden ?"
  69.   ))
  70.   (set #ask-install-help
  71.   (cat "Ist wichtig, wenn man auf noch weiteren Medien das Programm installiert haben möchte z.B. Disketten"
  72.   ))
  73.   (set #inst-install
  74.   (cat "Kopiere BangerMenu.install ..."
  75.   ))
  76.   (set #ask-prefs
  77.   (cat "Soll das mitgelieferte Konfigfile kopiert werden ?"
  78.   ))
  79.   (set #ask-prefs-help
  80.   (cat "Eine typische Einstellung. Die dennoch abgeändert werden muß für jedes Rechner System."
  81.   ))
  82.   (set #inst-prefs
  83.   (cat "Kopiere BangerMenu.prefs ..."
  84.   ))
  85.   (set #create-s-dir
  86.   (cat "Erstelle das S Verzeichnis."
  87.   ))
  88.   (set #ask-bat
  89.   (cat "Sollen die mitgelieferten Batchfiles kopiert werden ?"
  90.   ))
  91.   (set #ask-bat-help
  92.   (cat "In Verbindung mit der Beispiel Konfig kann man die Batchfiles schnell um schreiben und erhält so einen guten Einstieg in die Benutzung des Programms."
  93.   ))
  94.   (set #inst-bat
  95.   (cat "Kopiere das Verzeichnis Bat ..."
  96.   ))
  97.   (set #create-bat-dir
  98.   (cat "Erstelle das Bat Verzeichnis."
  99.   ))
  100.   (set #ask-MoniID
  101.   (cat "Wollen Sie BangerMenu mit einer anderen Auflösung starten ?"
  102.   ))
  103.   (set #ask-MoniID-help
  104.   (cat "Standardmäßig ist die Workbench beim Booten in PAL (außer USA). Ab Version 2.0 can BangerMenu mit Hilfe von der Angabe des Monitor Treibers und einer IDNummer, die Workbench in jeder beliebigen Auflösung darstellen. BangerMenu kann sogar Grafikkartenmodien benutzen. s. Guidefile"
  105.   ))
  106.   (set #endtext
  107.   (cat "Zum Starten von BangerMenu muß BangerMenu in der Startup-Sequence eingebunden werden. Zum richtigen Einbinden in die Startup-Sequence lesen sie bitte in der BangerMenu.guide nach.\n Der Pfad lautet : "
  108.   ))
  109.  )
  110. )
  111. (if (= @LANGUAGE "english")
  112.  (
  113.   (set #bad-kick
  114.   (cat "BangerMenu will only run under Kickstart 2.0 or above!.\nlooks on BangerMenu.guide\nInstallation abort."
  115.   ))
  116.   (set #choose-medium
  117.   (cat "Please choose a medium where BangerMenu should be installed!"
  118.   ))
  119.   (set #choose-m-help
  120.   (cat "BangerMenu can be install on harddrive or on disk."
  121.   ))
  122.   (set #choose-exe
  123.   (cat "Which program should I install ?"
  124.   ))
  125.   (set #choose-exe-help
  126.   (cat "BangerMenu is big an have a komplex config.\nBangerMenuDisk is very little, but not so much feature.\n"
  127.   ))
  128.   (set #choose-color
  129.   (cat "How many colors should your icons have ?"
  130.   ))
  131.   (set #choose-c-help
  132.   (cat "You can choose between 4 and 8 colors icons for your workbench."
  133.   ))
  134.   (set #choose-progdir
  135.   (cat "Please choose a dir where BangerMenu should be installed! A drawer BangerMenu will be created there."
  136.   ))
  137.   (set #choose-prog-help
  138.   (cat "In this location a drawer will be created. All files will be installed into this drawer."
  139.   ))
  140.   (set #create-dir
  141.   (cat "Creating BangerMenu directory"
  142.   ))
  143.   (set #inst-main
  144.   (cat "Installing main programs."
  145.   ))
  146.   (set #choose-disk
  147.   (cat "Please choose a diskfloppy where BangerMenu should be installed!"
  148.   ))
  149.   (set #choose-disk-help
  150.   (cat "Installing BangerMenu in C-dir of the Disk (create a C-dir, if required). Installing BangerMenu.prefs in S-Dir of the Disk (create a S-dir, if required). If you wish to install the guide, source and intallscript when you can choose it."
  151.   ))
  152.   (set #ask-source
  153.   (cat "Should I install the asm-sourcecode ?"
  154.   ))
  155.   (set #ask-source-help
  156.   (cat "Coders can use this code for their own programms."
  157.   ))
  158.   (set #inst-source
  159.   (cat "Installing BangerMenu.asm ..."
  160.   ))
  161.   (set #inst-source2
  162.   (cat "Installing BangerMonitorID.asm ..."
  163.   ))
  164.   (set #ask-guide
  165.   (cat "Should I install the guide of the programm ?"
  166.   ))
  167.   (set #ask-guide-help
  168.   (cat "The little guide of this programm."
  169.   ))
  170.   (set #inst-guide
  171.   (cat "Installing BangerMenu.guide ..."
  172.   ))
  173.   (set #ask-install
  174.   (cat "Should I copy the installscript ?"
  175.   ))
  176.   (set #ask-install-help
  177.   (cat "This is important, if you want to install the programm on other medium for example on disk."
  178.   ))
  179.   (set #inst-install
  180.   (cat "Installing BangerMenu.install ..."
  181.   ))
  182.   (set #ask-prefs
  183.   (cat "Should I install the configfile ?"
  184.   ))
  185.   (set #ask-prefs-help
  186.   (cat "A expamle configfile to lerning how to build yourself configfiles for BangerMenu."
  187.   ))
  188.   (set #inst-prefs
  189.   (cat "Installing BangerMenu.prefs ..."
  190.   ))
  191.   (set #create-s-dir
  192.   (cat "Creating S directory."
  193.   ))
  194.   (set #ask-bat
  195.   (cat "Should I install the directory bat ?"
  196.   ))
  197.   (set #ask-bat-help
  198.   (cat "A few example batch files for using BangerMenu."
  199.   ))
  200.   (set #inst-bat
  201.   (cat "Installing directory bat ..."
  202.   ))
  203.   (set #create-bat-dir
  204.   (cat "Creating Bat directory."
  205.   ))
  206.   (set #ask-MoniID
  207.   (cat "Would you start BangerMenu in a different standard solution ?"
  208.   ))
  209.   (set #ask-MoniID-help
  210.   (cat "The Workbench is standard in PAL (in USA is it NTSC). BangerMenu can in his new version the Workbench Screen equal in a higher solutions like VGA. You must give the program only two parameters the monitordriver and the idnumber. (Look at guide)."
  211.   ))
  212.   (set #endtext
  213.   (cat "Now you must wrote a few line to your Startup-Sequence. Look at the guide. The path is : "
  214.   ))
  215.  )
  216. )
  217. (complete 0)
  218. (if (< (/ (getversion) 65536) 37) (abort #bad-kick))
  219. (welcome)
  220. (complete 5)
  221. (set Medium
  222.     (askchoice
  223.         (prompt #choose-medium)
  224.         (help #choose-m-help)
  225.         (choices "HD" "Disk")
  226.         (default 0)
  227.     )
  228. )
  229. (set Exe
  230.     (askchoice
  231.         (prompt #choose-exe)
  232.         (help #choose-exe-help)
  233.         (choices "BangerMenu" "BangerMenuDisk")
  234.         (default 0)
  235.     )
  236. )
  237. (set progname "BangerMenuDisk")
  238. (if (= Exe 0)
  239.  (set progname "BangerMenu")
  240. )
  241. (complete 10)
  242. (set color
  243.     (askchoice
  244.         (prompt #choose-color)
  245.         (help #choose-c-help)
  246.         (choices "4" "8")
  247.         (default 1)
  248.     )
  249. )
  250. (if (= Medium 0)
  251.  (
  252.  (set preprogdest
  253.     (askdir
  254.         (prompt #choose-progdir)
  255.         (help #choose-prog-help)
  256.         (default "SYS:")
  257.         (newpath)
  258.     )
  259.  )
  260.  (set progdest ( tackon preprogdest progname ))
  261.  (makedir progdest
  262.       (prompt #create-dir)
  263.       (safe)
  264.  )
  265.  (if (= color 1) (set infosource (cat "8ColorDrawer/"progname".info"))
  266.     (set infosource (cat "4ColorIcons/"progname".info"))
  267.  )
  268.  (copyfiles
  269.     (source infosource)
  270.     (dest preprogdest)
  271.  )
  272.  )
  273. )
  274. (complete 20)
  275. (if (= Medium 1)
  276.  ((set preprogdest
  277.     (askdir
  278.         (prompt #choose-disk)
  279.         (help #choose-disk-help)
  280.         (disk)
  281.         (default "DF0:")
  282.     )
  283.   )
  284.   (set progdest ( tackon preprogdest "C" ))
  285.  )
  286. )
  287. (complete 30)
  288. (copyfiles
  289.     (prompt #inst-main)
  290.     (source progname)
  291.     (dest progdest)
  292. )
  293. (copyfiles
  294.     (prompt #inst-main)
  295.     (source "BangerMonitorID")
  296.     (dest progdest)
  297. )
  298. (if (= color 1) (set maininfo "BangerMonitorID.info")
  299.     (set maininfo "4ColorIcons/BangerMonitorID.info")
  300. )
  301. (copyfiles
  302.     (source maininfo)
  303.     (dest progdest)
  304. )
  305. (if (= Medium 1) (set progdest preprogdest))
  306. (complete 40)
  307. (if (askbool
  308.         (help #ask-source-help)
  309.         (prompt #ask-source)
  310.     )
  311.  (
  312.     (copyfiles
  313.         (prompt #inst-source)
  314.         (source (cat progname".asm"))
  315.         (dest progdest)
  316.     )
  317.     (if (= color 1) (set asminfo (cat progname".asm.info"))
  318.        (set asminfo (cat "4ColorIcons/"progname".asm.info"))
  319.     )
  320.     (copyfiles
  321.         (source asminfo)
  322.         (dest progdest)
  323.     )
  324.     (copyfiles
  325.         (prompt #inst-source2)
  326.         (source "BangerMonitorID.asm")
  327.         (dest progdest)
  328.     )
  329.     (if (= color 1) (set asminfo "BangerMonitorID.asm.info")
  330.        (set asminfo "4ColorIcons/BangerMonitorID.asm.info")
  331.     )
  332.     (copyfiles
  333.         (source asminfo)
  334.         (dest progdest)
  335.     )
  336.  ) 
  337. )
  338. (complete 50)
  339. (if (askbool
  340.         (help #ask-guide-help)
  341.         (prompt #ask-guide)
  342.     )
  343.  (
  344.     (if (= @LANGUAGE "deutsch")
  345.         ((set guidefile (cat progname".guide"))
  346.         (if (= color 1) (set guideinfo (cat progname".guide.info"))
  347.             (set guideinfo (cat "4ColorIcons/"progname".guide.info"))
  348.         )
  349.         )
  350.         ((set guidefile (cat progname"_Eng.guide"))
  351.         (if (= color 1) (set guideinfo (cat progname"_Eng.guide.info"))
  352.             (set guideinfo (cat "4ColorIcons/"progname"_Eng.guide.info"))
  353.         ))
  354.     )
  355.     (copyfiles
  356.         (prompt #inst-guide)
  357.         (source guidefile)
  358.         (dest progdest)
  359.     )
  360.     (copyfiles
  361.         (source guideinfo)
  362.         (dest progdest)
  363.     )
  364.  )
  365. )
  366. (complete 60)
  367. (if (askbool
  368.         (help #ask-install-help)
  369.         (prompt #ask-install)
  370.     )
  371.  (   
  372.     (if (= @LANGUAGE "deutsch")
  373.         ((if (= color 1) (set installinfo "Deutsch.install.info")
  374.             (set installinfo "4ColorIcons/Deutsch.install.info")
  375.          )
  376.         )
  377.         ((if (= color 1) (set installinfo "English.install.info")
  378.             (set installinfo "4ColorIcons/English.install.info")
  379.          )
  380.         )
  381.     )
  382.     (copyfiles
  383.         (prompt #ins-install)
  384.         (source "BangerMenu.install")
  385.         (dest progdest)
  386.     )
  387.     (copyfiles
  388.         (source installinfo)
  389.         (dest progdest)
  390.     )
  391.  )
  392. )
  393. (complete 70)
  394. (if (askbool
  395.         (help #ask-prefs-help)
  396.         (prompt #ask-prefs)
  397.     )
  398.    (
  399.     (if (= Medium 1)
  400.       (
  401.         (set progdest ( tackon preprogdest "S" ))
  402.         (makedir progdest
  403.             (prompt #create-s-dir)
  404.             (infos)
  405.             (safe)
  406.         )
  407.       )
  408.     )
  409.     (copyfiles
  410.         (prompt #inst-prefs)
  411.         (source (cat progname".prefs"))
  412.         (dest progdest)
  413.         (safe)
  414.     )
  415.     (if (= color 1) (set prefsinfo (cat progname".prefs.info"))
  416.         (set prefsinfo (cat "4ColorIcons/"progname".prefs.info"))
  417.     )
  418.     (copyfiles
  419.         (source prefsinfo)
  420.         (dest progdest)
  421.     )
  422.     (if (askbool
  423.         (help #ask-bat-help)
  424.         (prompt #ask-bat)
  425.         )
  426.        (
  427.         (if (= Medium 0)
  428.            (
  429.             (set batdest ( tackon progdest "bat"))
  430.             (makedir batdest
  431.                 (prompt #create-bat-dir)
  432.                 (infos)
  433.                 (safe)
  434.             )
  435.            )
  436.            (set batdest progdest)
  437.         )
  438.         (copyfiles
  439.             (prompt #inst-bat)
  440.             (source "bat")
  441.             (all)
  442.             (dest batdest)
  443.             (safe)
  444.         )
  445.        )
  446.     )
  447.    )
  448. )
  449.  
  450. (complete 80)
  451. (if (= Exe 0)
  452.   (if (askbool
  453.     (help #ask-MoniID-Help)
  454.     (prompt #ask-MoniID)
  455.     )
  456.     (
  457.     (run "BangerMonitorID")
  458.     )
  459.   )
  460. )
  461. (if (= Medium 0) (set filedest ( tackon progdest progname ))
  462.  (set filedest ( tackon preprogdest "C"))
  463. )
  464. (complete 90)
  465. (message #endtext filedest)
  466. (complete 99)
  467. (exit)
  468.  
  469.